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PREFACE 


Before reading this manual, you should be familiar with the BASIC-l1l 
language and the RT-1l1l_ system. If necessary, read the following 
manuals before reading this User's Guide: 


e BASIC-11 Language Reference Manual (DEC-11-LIBBB-A-D) 
® Introduction to RT-1ll 

or 
e RT-11 System User's Guide 


Most features of BASIC-11/RT-11 V2 are the same as in other versions 
of BASIC-1l1. (DIGITAL's name for a family of BASICs for the PDP-11l). 
These features are described in the BASIC-11 Language Reference Manual 
(DEC-11-LIBBB-A-D) . Pe eg ee 


This guide describes the system dependent features of BASIC-11/RT-1l. 
They are: 


Procedure for starting BASIC 

Effect of the CTRL/C key command 

Accuracy of storing numbers 

Format of error messages 

Format of the file specification 

Effects of parameters in the OPEN statement 
Procedure for checking files 

Effect of superseding files 

Effects of the utility functions 

Procedure for using assembly language routines 
Procedure for terminating BASIC 


All BASIC users should read this guide excluding only Chapter 4. Only 
users who are adding assembly language routines to BASIC need to read 
Chapter 4. Chapter 4 assumes that you are an experienced RT-11l MACRO 
programmer. 


This guide assumes that you have linked BASIC according to the 
procedure described in the BASIC-11/RT-11 Installation Guide 
(DEC-11-LIBTA-A-D). 


DOCUMENTATION CONVENTIONS 


This section describes the documentation conventions, notations, and 
symbols used throughout this manual. 


The following symbols denote special terminal keys that you will use 
frequently when using BASIC. 


Symbol Meaning 


While pressing the CTRL key, type the letter indicated 
after the slash. 


Type the RETURN key. 
Eso) Type the ESCAPE key (ALTMODE on some terminals). 
@ED Type the DELETE key (RUBOUT on some terminals). 


In addition, this manual uses certain conventions when describing the 
format of statements, functions, and commands. 


These are: 
Convention Meaning 
The enclosed elements are optional. For example: 
[ ] [Ler | var iable=expression 

A choice of one element among two or more 

possibilities, for example: 
THEN statement 

IF relational expression<THEN line number 

GO TO line number 


er Preceding element can be repeated as indicated. 
For example: 


line number CLOSE#exprl,#expr2,... 


Items in Type these elements exactly as they appear in the 
capital format, for example: 
letters and 
special LET 
symbols RUN 
# 


Items in capital letters are called keywords. 


Items in Replace these elements according to the 
lower case description provided in text. See below for list 
letters of commonly used lower case items. 


This list describes some lower case items commonly used in format 
descriptions. The general meaning of each item is given. Unless a 
specific format description places restrictions on an item, its 
general meaning applies. See the BASIC-1ll Language Reference Manual 
for more information on these items. 
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Lower Case Abbreviation Meaning 


Item 

expression expr Any valid BASIC-11l expression. 
It is always a numeric 
expression unless the 
description specifically states 
that it can be a numeric or 
string expression. For 
example: (5*SIN(X))“Y 

file specification --- A file specification as 
described in Section 2.1 

integer int Any positive integer number 
constant or any positive 
numeric constant that could be 
an integer if a percent sign 
were put after it. For 
example: 5%, 3%, 2, 7 

line number a had Any valid line number. For 
example: 10, 100, 32767 

string -s= Any string expression. For 
example: 
"ABC", CS+SEGS (AS$,3,4) 

variable var A floating point, integer or 


string variable. 
If more than one lower case word appears in a format, the words are 
numbered 1, 2, 3, etc. For example: 
CLOSE #exprl,#expr2,#expr3,... 


Throughout this manual, the term BASIC means BASIC-11 or 
BASIC-11/RT-11. 


To differentiate between what BASIC prints and what you type, the user 
type-in is printed in red ink. For example: 


PUNE 


WHAT NUMBERS? S910 
THE SUM TS is 


RALLY 


All user type-in is terminated by the RETURN key unless the text 
indicates a different terminator. 
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CHAPTER 1 


GETTING STARTED WITH BASIC-11/RT-11 


1.1 OPTIONAL FEATURES 


BASIC-11/RT-11 has numerous optional features. If you include all 
optional features, any feature described in the BASIC-1l1 Language 
Reference Manual or in this guide is available. By excluding some or 
all optional features, you can increase the amount of memory available 
for programs or have faster program execution, or both. 


BASIC-11/RT-11 has available the following optional features: 


Statements 

CALL 

PRINT USING 

Commands 

SUB 

RESEQ 

Functions 

SOR SYs ABS SEGS 

SIN RCTRLO SGN VAL 

cos ABORT BIN TRMS 

ATN TTYSET OcT STRS 

LOG CTRLC LEN PI 

LOG10 RCTRLC ASC INT 

EXP TAB CHRS DATS 
RND POS CLKS 

Miscellaneous 


e Double precision arithmetic 

e Long error messages 

e Exponentiation (e.g., the expression AB) 

e Ability to run BASIC as foreground or background job 


e Features affecting program space availability and program 
execution speed 


You must specify the inclusion or exclusion of some optional features 
at BASIC linking time. Others you select at BASIC run time. The 
features you can choose when you link BASIC are: 
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All optional statements 

All optional commands 

SQR, SIN, COS, ATN, EXP, LOG, and LOG10O functions 
All miscellaneous optional features 


The features you can choose at run time are the following optional 
functions: 


SYS ABS SEGS 
RCTRLO SGN VAL 
ABORT BIN TRMS 
TTYSET ocT STRS 
CTRLC LEN PI 

RCTRLC ASC INT 
TAB CHRS DATS 
RND POS CLKS 


Before using BASIC you must link a version with the optional features 
you want. See the BASIC-11/RT-11 Installation Guide for instructions 
to link BASIC and for information about allowed program size and speed 
of execution tradeoffs. 


1.2 STARTING BASIC 

You can use BASIC with either the single-job (SJ), 
foreground/background (FB), or extended memory (XM) RT-1l V3 monitor. 
When using the FB or XM monitor, you can run BASIC as either’ the 
foreground or background job. 


Before starting BASIC, you must bootstrap RT-1l and enter the DATE and 
TIME commands. See the Introduction to RT-1l for a description of 
these procedures. 


1.2.1 Running BASIC With the Single Job Monitor or as the Background Job 
To run BASIC with the SJ monitor or as the background job, enter 
either the BASIC or the RUN command. The BASIC command runs the file 
BASIC.SAV on your system device. To enter the BASIC command, type: 
+BASTIC 
To use another version of BASIC, type: 
»KUN file specification 
where: 


file specification specifies the file containing the 
version of BASIC that you want. 


For example, if you have a version of BASIC on device DXl: with file 
name BAS8K, and you want that version instead of the one in BASIC.SAV, 
you should enter: 


*RUN TXT 2 BASEN 
If you specify a file that does not exist, RT-11 prints the message: 


PRMONeF Fale mok fone 
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If there is not enough room to run BASIC, one of the following 
messages is printed: 


NOY ENOUGH MEMORY FOR BASIC 
or 
?KMON@ Fe Nok ermougin memory 


This error often results from a large foreground job that has not been 
unloaded. 


If there are no errors, BASIC prints an identifying message and 
inquires whether you want the optional functions that are selectable 
at run time. 


BASIC 
BASIC@“LIZRT 11 VOR=xx 
OF TIONAL FUNCTIONS CALL» NONEy OR INDTULOUALD? 


To include all of the optional functions, type an A. To exclude all 
of the optional functions, type anN. (You must always terminate 
input to BASIC with the RETURN key.) In response to your A or N, BASIC 
includes or excludes all the functions and then prints the READY 
message. For example: 


OPTIONAL FUNCTIONS CALL» NONE» OR TNYTYITUAL PA 
PE ALLY 


Typing only the RETURN key in response to the optional functions 
request is equivalent to typing A. 


If you want to choose among the optional functions individually, type 
an I. BASIC then prints an inquiry for each function individually. 
To include a function type a Y; otherwise type an N. Typing only the 
RETURN key in response to the function request is equivalent to typing 
Y. If you type anything else, BASIC repeats its request. After you 
have typed a Y or anwN in response to each function inquiry, BASIC 
prints the READY message. For example: 


OR TIONAL FUNCTIONS CALL» NONE OR TNDTUINUAL 3? T 
SYSP N 

ROTRLOF N 

ABORT? N 

TTYSE TT ON 

CTRLG & ROTRIC? N 

TARP 
RINSE 
ABS? 
SGN? 
BIN? 
OOTP 
1.REINP 
ASHP 
CHES? ON 
FOS? N 
SEG? N 
VAL? oN 

TRMS? ON 
STAB? N 
Br? ON 


zuax<~<<<«<< 
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INT? ¥ 
DATET N 
CLINE? 


RE ATEY 


1.2.2 Running BASIC As the Foreground Job 


To run BASIC as the foreground job, use the FRUN command. Type: 


where: 
file specification specifies the file containing BASIC 
number is the size of the user area (i.e., the 


number of words to be reserved). It 
must be 1000. or greater. The decimal 
point identifies the number as decimal, 
not octal. 


You must specify the user area size, or else no area will be reserved 
and BASIC will not be able to run. 


The user area will actually be approximately 100 words more than you 
request. For example, the following command reserves approximately 
3100 words. 


*FRUN BASTC/NS 3000. 
If the file specified does not exist, RT-ll prints the message: 
?KMON-Fe File mot fourid 


Tf the number of words requested in the FRUN command is not large 
enough, BASIC prints the message: 


NOT ENOUGH MEMORY FOR BASIC 


If there are no errors, RT-1l prints a dot and the F> message to 
indicate that the next message is printed by the foreground job. 
BASIC then prints an identifying message and inquires whether you want 
the optional functions. For example: 


«+FRUN BASTC/NE 3000. 


FP “p 
BASTC@-LI/RT 11 YOR-xx 
OF TIONAL FUNCTIONS CALL» NONE OR TNDIVIGUAL >)? 


Type a CTRL/F and then answer the optional function inquiry as 
described in the previous section. 


NOTE 


To use a device other than the system 
device, you must load the handler before 
you run BASIC in the _ foreground. See 


the RI-ll System User's Guide for more 


information about foreground jobs. 
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1.2.3 Running BASIC From an Indirect File 


You can run BASIC and answer the initial dialogue by using an indirect 
file. You can only run BASIC in this way as the background job or in 
the single job monitor. This technique is useful when you select the 
optional functions individually. 


You cannot enter any BASIC command, program line, or immediate mode 
statement through an indirect file. 


To create the indirect file, direct the editor to create a file with a 
file type .COM that contains all anticipated responses to system 
queries. For example: 


oR EYE T 

XE WM TNRUN «COM Eso) 
TR BASIC 

I 


(2c eee eee eKKHtK Kez 


N 
N 

E50) 

KEX €SQ ESO 


* 


To start BASIC, type an @ ("at" sign) followed by the file name. The 
complete initial dialogue is printed on the terminal. For example: 


«@MINRUN 


oh BASIC 

BASTC@LAZKRT 11 VOQ2-xx 

OPTIONAL FUNCTIONS CALL» NONEY OR TNDIYINUAL 2? T 
SYS? N 

ROTRLOP N 

ABORT? N 

TTYSET? N 

CTRL & ROTRILCP N 

TAR? N 
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RRND? ¥ 
ARS? ¥ 
SON? Y 
BIN? ¥ 
OCT? ¥ 
LEN? ON 
ASC? N 
CHRP oN 
ROS? ON 

SEG#? N 
VAL? ON 
TRMGS?P ON 
STR? N 
Br? ON 

INT? ¥ 

LVATH&? N 
CLASP ON 


RE ALY 


See the RT-ll System User's Guide for more information on using 
indirect files. 


1.3 STOPPING BASIC PROGRAMS (CTRL/C COMMAND) 
To stop execution of a BASIC program, use the CTRL/C command. If you 
type one CTRL/C, BASIC interrupts your program the next time it 
requests input. Tf you type two consecutive CTRL/C's, BASIC 
interrupts your program immediately. After BASIC interrupts your 
program, it prints: 

STOF AT LINE xxxxx 

REATIY 


where: 


XXXXX is the number of the line that BASIC was executing when 
the CTRL/C command halted the program. 


However, if you were not executing a program line, BASIC prints: 
STOF 
REATY 

When you type CTRL/C, the system prints “C. For example: 


10 GO. TO 10 
RUNNH 


ay Seas 
STOP AT LINE 1 


REATIY 


NOTE 


CTRL/C does not return control to the 
RT-1l monitor. You must type the BYE 
command (see Section 1.4) to return 
control to RT-1l. 
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1.4 TERMINATING THE SESSION (BYE COMMAND) 


To terminate a session with BASIC, type the BYE command. The BYE 
command returns control to the RT-1ll monitor, which prints its 
prompting period. For example: 


co a 
* 


Once you have entered the BYE command you cannot use the RT-11 REENTER 
command to return to BASIC. Instead, you must restart BASIC as 
described in Section 1.2. If you want to reuse your BASIC. program, 
save it before entering the BYE command. 


If you ran BASIC as the foreground job, you must unload it after you 
enter the BYE command. Type: 


eUNLOAD FG 


1.5 FLOATING POINT NUMBER PRECISION 


You can use BASIC with either single or double precision arithmetic. 
Single precision arithmetic allows floating point numbers to seven 
digits of precision. Thus, single precision BASIC stores the numbers 
1.000001 and 1.000000 (seven digits) differently but stores 1.0000001 
and 1.0000000 (eight digits) as the same number. Double precision 
arithmetic allows you to specify floating point numbers to 15 digits 
of precision. 


If you need more than seven digits of precision, you should use BASIC 
with double precision arithmetic. However, double precision BASIC has 
two disadvantages. 


l. It allows less BASIC program space, because BASIC itself 
requires more memory and because all floating point 
constants, variables, and arrays require twice the memory 
that single precision would need. 


2. Arithmetic operations and functions run more _ slowly with 
double precision than with single precision. 


The PRINT statement only prints six digits even when you are _ using 
double precision arithmetic. Consequently, if you want to print a 
number with more than six digits, you must use the PRINT USING 
Statement or the STRS function. The following example was run using 
double precision arithmetic. 


LTS TNH 

LG X#4. 237194237 

29 Y#h. 9080909 

SO FRINT XxXY 

4QO FRINT USING “dbl. ibaa aaa y XY 
SO FRINT STRECXKY)D 


REALLY 
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RUNNE 


29 e275 
oP Q7 51601 
29.2751 60144389 


RE ATIY 


Double precision compiled BASIC uses the default file type .BAX while 
single precision compiled BASIC programs have the default file type 
-BAC. The different default file types are necessary because double 
precision BASIC cannot read a program compiled by single precision 
BASIC and vice versa. If you are using double precision BASIC and 
specify the file type of a program compiled by single precision BASIC 
or vice versa, the results are unpredictable. 


1.6 SYSTEM DEPENDENT ERROR MESSAGES 


Some of the error messages listed in the BASIC-ll Language Reference 
Manual either have special meaning in BASIC-11/RT-1l or are not 
produced by it. These error messages are 


?CANNOT DELETE FILE (?CDF) 
BASIC-11/RT-11 does not produce this message. 


PERROR CLOSING CHANNEL (?ECC) 
BASIC-11/RT-11 does not produce this error message. If an error 
occurs when BASIC-11/RT-1l1 is trying to close ae channel, 
BASIC-11/RT-11 prints the ?CHANNEL I/O ERROR (?CIE). 


?FILE ALREADY EXISTS (?FAE) 
BASIC-11/RT-11 does not produce this message. 


?FILE PRIVILEGE VIOLATION (?FPV) 
BASIC-11/RT-11 does not produce this message. 


?FILE TOO SHORT (?FTS) 
The file is too small to contain the output. If the error occurs 
in a data file, specify a larger FILESIZE. If the error occurs 
in a program file, delete unused files with the UNSAVE command 
and then retry. 


PILLEGAL DEF (?IDF) 
BAISC-11/RT-11 does not produce this message. 


?P?ILLEGAL FILE LENGTH 
The FILESIZE specified was less than -l (see Section 2.2). 


PILLEGAL RECORD SIZE (?IRS) 
BASIC-11/RT-11 does not produce this message. 


?NOT A VALID DEVICE (?NVD) 
BASTC-11/RT-11 does not produce this message. 


?NOT ENOUGH ROOM (?NER) 
There is not enough room for the FILESIZE specified. Delete 
unused files with the UNSAVE command. 
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FILES 


2.1 FILE SPECIFICATION 


BASIC uses the standard RT-1ll file specification. 


Its format is: 


[device :] [£ ilename]| E type | 


where: 


device 


filename 


type 


is the device name. It can be any device 


listed in Table 2-1 or any assigned device name (see 


the RT-ll User's Guide). 


is the one- to six-character name of the file. 


is the zero- to three-character type of the file. 


Table 2-1 
RT-11 Device Names 


Card Reader 
Cassette 

RLO1 Disk 
RKO6 Disk 
RPO2 Disk 
RJS03/4 Disk 
DECtape 

RX1l1 Diskette 
Line Printer 


TJU1L6 Magtape 


TMll Magtape 


Combined high-speed paper tape reader and punch 
RF11l Disk 


(continued on next page) 
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Table 2-1 (Cont.) 
RT-11 Device Names 


RKO5 Disk 


Console Terminal Keyboard/Printer 


System device (the volume from which the 
monitor was bootstrapped) 


The default storage volume 


Tf you do not specify any of the elements of the file specification, 
BASTC uses a default value. 


The default device is DK:. The default for the file name and file 
type depends on the statement or command in which the file specifica- 
tion appears. Table 2-2 shows the file name defaults, and Table 2-3 
shows the file type defaults, 


Table 2-2 
Default File Names 


Statement or Command Default 


SAVE, REPLACE, COMPILE the current program name 


OLD,APPEND,CHAIN the file name NONAME 
OVERLAY 


UNSAVE, OPEN, KILL no default but prints 

NAME the ?ILLEGAL FILE 
SPECIFICATION (?IFS) 
error message instead. 


Table 2-3 
Default File Types 


Statement or Command Single precision Double precision 
BASIC Default BASIC Default 


OPEN, KILL,NAME -DAT - DAT 


SAVE, REPLACE, UNSAVE - BAS -BAS 
APPEND 


COMPILE - BAC - BAX 


RUN,OLD »-BAC (and if a .BAC -BAX (and if a 
cannot be found .BAS) -BAX cannot be 
found .BAS) 


FILES 


When you create a file whose file specification is the same as an 
existing file, the older file will be deleted (superseded) when the 
new file is closed. You can avoid unwanted deletions by using the 
SAVE command to save new files. If a SAVE command specifies a file 
name that already exists, BASIC-1ll prints the following error message: 


PTUSE REPLACE CPRELD 


This gives you an opportunity to decide whether you want to supersede 
the old file, or store the file under a different file specification. 


2.2 THE OPEN STATEMENT - SYSTEM DEPENDENT FEATURES 
The format of the OPEN statement is: 


i FOR INPUT 
OPEN string L\FOR OUTPUT{] AS FILE [#] exprl [DOUBLE BUF] 


[,RECORDSIZE expr2] [,MODE expr3] [,FILESIZE expr4] 


where: 

string is a file specification as described in 
Section 2.1. 

exprl is the channel number of the file. Tt can 
have any value between 1 and 12. 

DOUBLE BUF causes the file to be double buffered. 
Double buffering increases the speed of some 
file operations but requires additional 
memory for the second buffer. 

RECORDSIZE expr2 is ignored if specified. 

MODE expr 3 is ignored if specified. 

FILESIZE expr4 if positive, specifies the maximum number of 


256-word blocks the file can occupy. If 
FILESIZE is missing or expr4 equals 0, it 
requests the standard BASIC-11/RT-1l file 
allocation (that is, either half the largest 
free area or all of the second-largest free 
area, whichever is larger). If expr4 equals 
-l, it requests the absolute largest free 
area. If expr4 is less than -1l, the error 
message ?ILLEGAL FILE LENGTH appears. 


The elements of the OPEN statement described above are the system 
dependent elements. The other elements of the OPEN statement are 
described in the BASIC-11 Language Reference Manual. 


2.3 LISTING YOUR FILE DIRECTORY 


You must return control to the RT-11 monitor before listing your file 
directory. First save your current BASIC program (if you wish to 
reuse it later) and then enter the BYE command. The monitor prints 
the dot prompt. For example: 


FILES 


SAVE TEMF 


RE ATIY 

BYE 
Following the prompt, type the RT-1l DIRECTORY command. A_ simplified 
format of the RT-11 directory command (see the RT-11 System User's 
Guide for a complete description) is: 


DIRECTORY [PRINTER | file specification 


where: 

/PRINTER specifies that the directory is to _ be 
printed on the line printer. (If 
omitted, the directory is printed on the 
terminal.) 

file specification specifies the files that you want 


listed. Tf you omit the file 
specification, all files are listed. 


The DIRECTORY command wildcard feature allows you to specify files 
with similar file names, or Similar file types, or both. If you 
substitute an asterisk for the file name but specify a file type, all 
files with that file type are listed. For example, the following 
command lists all BASIC source programs on the line printer: 


sUIKRECTORY/FPRINTER  &. BAS 


Similarly, if you substitute an asterisk for the file type, but 
specify a file name, all files with that file name are listed, 
regardless of file type. For example, the following command lists all 
files with the file name TEST: 


¢TIRECTORY/PRINTER TEST. x 


If you specify a percent sign in place of any characters in ae file 
name or file type (for example, TEST%%.BAS), then all the files whose 
specifiers match the other characters in the specification are listed 
(TESTAB.BAS, TESTO1.BAS, and TESTER.BAS would be listed, if they 
exist, for the specification TEST%%.BAS). 


To list all the BASIC programs and compiled BASIC programs, type: 
eTIRECTORY &. BAX 


Note that this command also lists files with the file type .BAK and 
-BAT. Because the specification /PRINTER is absent, listing occurs on 
the terminal. 


After listing your directory, you can return to BASIC by using the 
BASIC command, then restore your saved program with the OLD command, 
and finally, delete the temporary file. For example: 


e RASTIC 
BASTIC-LI/KRT<11 VYO2-xx 
OF TIONAL FUNCTIONS (ALL » NONE» OR INDTVIDUALD? A 


REALY 

OLD TEMP 
REALLY 
UNSAVE TEMF 
READY 


CHAPTER 3 


UTILITY FUNCTIONS 


3.1 BASIC UTILITY FUNCTIONS 
BASIC has utility functions to: 
e Change the terminal width (TTYSET) 
e Cancel the effect of CTRL/O (RCTRLO) 
e Disable CTRL/C (CTRLC and RCTRLC) 
e Terminate your program (ABORT) 
e Input a single character from your terminal (SYS) 
e Terminate BASIC (SYS) 
e Check if a CTRL/C has been typed (SYS) 
e Enable lower case support (SYS) 


In the following sections, BASIC-11 utility functions are shown in the 
context of a LET statement with a dummy target variable, as follows: 


[LET] variable = utility function 
where: 
variable is the target variable. 
utility function is one of the functions described in this 
chapter. 


Actually, utility functions can appear in any arithmetic expression. 
The LET statement format is recommended because it is the simplest 
Statement, and consequently, produces easier-to-read programs. 


3.2 SETTING THE TERMINAL MARGIN (TTYSET FUNCTION) 


Use the TTYSET function to set your terminal's right margin. BASIC 
prints on a line until a number or string would extend past the margin 
you set. BASIC then prints a return and line feed on the current line 


and prints the string or number on the next line. 


The format of the TTYSET function is: 


[LET] variable=TTYSET (255%,expression) 
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where: 

variable is the target variable and contains an undefined 
value after the statement is executed. 

255% is either a numeric constant (as specified in 
format) or an expression with an integer value of 
255 (for compatibility with other versions of 
BASIC). 

expression specifies the right margin of the terminal. The 


margin is set to the value of the expression minus 
l. If the expression equals 0, BASIC does not 
change the previous margin. 


For example, to set BASIC to print to the full width of an LA36 
DECwriter II (132 columns), type: 


AZTTYSET (255% 9 133%) 


To set BASIC to print to the full width of a VT50 display terminal (80 
columns), type: 


AxTTYSET (225% 9814) 


If you do not specify the TTYSET function, BASIC assumes a_e terminal 
with 72 columns. 


Ensure that the system's margin for your terminal is equal to or 
greater than the margin you specify in TTYSET. 


If the value of the expression is less than 0, equal to l, or greater 
than 256, BASIC prints the ?ARGUMENT ERROR (?ARG) message. If the 


first argument has a value other than 255, BASIC prints the same 
message. 


3.3 CANCELING THE EFFECT OF CTRL/O (RCTRLO FUNCTION) 
BASIC stops terminal output when the CTRL/O key is typed; however, 
the RCTRLO function causes BASIC to resume printing. Use the RCTRLO 
function to ensure that certain data is printed on the terminal even 
if a CTRL/O has been typed. 
The format of the function is: 

[LET] variable=RCTRLO 
where: 


variable is the target variable and contains an undefined 
value after the statement is executed. 


Consider the following example: 
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LISTNH 

10 REM FROGRAM TO ITNFUT DATA 
20 REM FROM FILE AND FRINT SUM 
30 OREN "NUMBR" FOR INFUT AS FILE dd 
4O FRINT "CATA IN FILES" 

20 TF END #1 THEN 1060 

60 INFUT dd ot 

70 PRINT 1% 

BO Te Tn 

90 GO TO SO 

100 A#ROTRLO 

LLG PRINT 

120 FRINT "SUM=" 5 7 


REATIY 
RUNNEH 


4 
1é 
147 
26 

SUM 4172 


REATIY 
While BASIC executes the loop from line 50 to line 90 it prints out 


numbers. If CTRL/O is typed BASIC stops printing. But when BASIC 
executes line 100, BASIC resumes printing. 


3.4 DISABLING CTRL/C (RCTRLC AND CTRLC FUNCTIONS) 
In certain parts of the program you may need to override CTRL/C 
interrupts from the terminal. The RCTRLC function disables CTRL/C and 
prevents it from stopping the BASIC program. The CTRLC function 
enables the CTRL/C key command. 
The format of the functions are: 

[net] variable=RCTRLC 

[Let] variable=CTRLC 


where: 


variable is the target variable; it contains an undefined 
value after the statement is executed. 


After BASIC executes the RCTRLC function, typing CTRL/C on _ the 
terminal does not stop the program. 


After BASIC executes the CTRLC function, typing CTRL/C stops’ the 
program. BASIC does not save any CTRL/C that is typed while CTRL/C is 
disabled. If the program encounters a CTRL/C function, and no. prior 
RCTRLC function is in effect, the CTRL/C function has no effect. 


When BASIC prints the READY message, it automatically enables’ the 
CTRL/C key command. 


For example: 
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LiSTNH 

16000 REM TO NOT ALLOW INTERRUFTS 

LO10 A=SROTRLC 

1LO20 FRINT "NO INTERRUPTS" 

LO30 FOR T= 1 TO 1000 \ S#StI \ NEXT I 
L100 REM NOW ALLOW INTERRUPTS 

L110 ABCTRILC 

L120 FRINT "INTERRUPTS OKAY" 

1130 FOR To = 1 TO 1000 \ S#S+T \ NEXT I 
32767 NY 


REALLY 
RUNNE 


NO INTERRUPTS 
INTERRUPTS ORGY 
STOR AT LINE L113 
RE ATTY, 
For information on a system function that determines if CTRL/C has 
been typed while CTRL/C is disabled, see Section 3.6.3. 
NOTE 
Once CTRL/C is disabled it is not 
possible to interrupt BASIC. Do not 


disable CTRL/C until your program is 
debugged. 


3.5 TERMINATING YOUR PROGRAM (ABORT FUNCTION) 


If you want a program to delete itself from memory when it terminates, 
use the ABORT function. The ABORT function is equivalent to an END 
Statement except that ABORT can optionally delete your program from 
memory and change the program name to NONAME (equivalent to the SCR 
command). 


The format of the ABORT function is: 


[Ler] var iable=ABORT (expression) 


where: 
variable is the target variable; it contains an undefined 
value after the statement is executed. 
expression determines if the program is to be deleted from 


memory. If expression equals 0, BASIC does not 
delete the program. If expression equals 1, BASIC 
deletes the program. 


Consider the following examples: 
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Delete from memory 
when program completed 


biol 
ABORT 24—-JUNN 227 Laem tas 
LO FRINT "Leg" 


20 A#®ABORT C1) 
3O PRINT "456" 


Do not delete when 
program completed 


List 
ABORT 2h—JUN=77 14iS420o 
LO PRINT "L235" 


29 ASABORT CO) 
3O FRINT "456" 


RE AMY RE ATIY 
RUNNH RUNNI 
123 122 

PE ALY FE ATVY 
LS T LST 


NONAME 21 UN@8 76 14353530 


REATIY 
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ABORT 2a-JUN@76 14854730 
10 PRINT "L233" 

20 A#ABORT CO) 

SQ PRINT "454" 


RE ATLY 


System functions perform system-dependent operations. 
The formats of the system functions are: 


[Let] variable= SYS(expressionl ,expression2 ) 


where: 
variable is the target variable. 
expressionl determines the function to be performed. 
expression2 is an optional argument used in some system 


functions. 


Table 3-1 summarizes the functions performed according to the 
specified value of expressionl. Any value of expressionl other than 
those specified causes BASIC to print the ?ARGUMENT ERROR (?ARG) 
message. 
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Table 3-1 
Summary of System Functions 


Value of Function Performed 


expressionl 


Processes input one character at a time. Target 
variable contains the ASCII value of the next 
character typed at the terminal. 


Terminates BASIC and returns control to system 
monitor (equivalent to the BYE command). 


Determines if CTRL/C has been typed while CTRL/C is 
disabled by RCTRLC function. Target variable equals 
1 if CTRL/C has been typed and equals 0 if CTRL/C has 
not been typed. 


Enables or disables lower case input from your 
terminal. If expression2 equals 0, lower case 
character input is allowed. If expression2 equals l, 
lower case character input iS converted to the 
equivalent upper case character input. 


3.6.1 Single Character Input 


Use the single character input system function, SYS(1), to process 
input one character at a time. 


SYS(1) returns the seven-bit ASCII value of any character typed on the 
terminal except CTRL/C. (See the BASIC-11l Language Reference Manual 
for a list of the ASCII values.) If CTRL/C is typed when BASIC is 
executing SYS(1) and CTRL/C is enabled, then BASIC prints the STOP and 
READY messages. If CTRL/C is disabled, then BASIC continues executing 
SYS(1) and waits for another character. BASIC cannot process the 
character until you type the RETURN key. 


LISTNH 

LO FRINT "TYFE A CHARACTER? "3 

20 A=SYSCL) 

4QO PRINT "THE ASCIT VALUE OF "SCHRECADS*® IS*Ga 
REATLIY 

RUNNH 

TYPE A CHARACTER? Z 

THE ASCIT VALUE OF Z TS 90 


RE ATIY 


3.6.2 Terminating BASIC 


To terminate BASIC from a BASIC program, use system function SYS(4). 
It is equivalent in effect to the BYE Command. 


For example: 
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LISTNH 
10 FRINT "GOOURYE* 
20 A#=SYS(4) 


REALLY 
RUNNH 
GOOTBYE 


e 


3.6.3 Checking for CTRL/C 


If you have disabled CTRL/C with the RCTRLC function and want to check 
if CTRL/C has been typed, use system function SYS(6). The function 
returns a 1 if CTRL/C has been typed and a 0 if it has not been typed. 


For example: 


LISTNH 

LO ABRCTRLCO N REM Disable CTRL/C. 
SO BR=SYS(6) \ REM Check for CTRIL/C. 
40 IF Be) THEN 100 

JO PRINT "STILL EXECUTING" 

60 GO TO 30 

100 PRINT "FROGRAM TERMINATING" 

L160 ASCTRLO REM Reenable CTRL/C. 
120 A=ABRORT CL) 


RE ATHY 
RUNNH 


STL. EXECUTING 
STILL EXECUTING 


STILL EXECUTING 


FROGRAM TERMINATING 


REATIY 


3.6.4 Enabling Lower Case Support 


If you want to enter lower case characters at your terminal, use _ the 
system function SYS(7,expr2). The RT-11 system usually converts all 
lower case alphabetic characters to upper case. Executing the 
function SYS (7,0) causes RT-1ll to stop converting lower case 
characters and to pass them unchanged. To cause RT-11 to resume 
converting lower case characters, you must execute the function 
SYS(7,1). After you exit from BASIC, the monitor continues to process 
characters as it did before BASIC was active. 


The following example demonstrates how to enable and disable lower 
case. The program is first run to enable lower case by causing the 
function SYS(7%,0%) to be executed. After this the program is 
modified to allow the user to enter a lower case response. Finally, 
the modified form of the program is run; this disables lower case. 
The modified program is then saved. 
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or 


lawer 
20 \ Rem Cnectk. 
then 20 \ Rem 


for 


CHARACTERS CY OR NO? Y 


Cage 3 


LOWER CASE CONVERSION 


lower case m 
Check for 


CASE CHARACTERS (CY OR N)*°$ 


TO ENTER LOWER CASE CHARACTERS (CY OR ND "5 


20 \ REM Check 


CASE 


LOWER CASE 


Case 


LISTNH 

10 REM FROGRAM TO CHANGE LOWER CASE CONVERSION 
20 FRINT "00 YOU WANT TO ENTER LOWER 

30 INFUT AS 

40 IF AsS="Y" THEN 100 

SO ITF A&=> "NN" THEN 20 

60 A#SYS(7%91%) \ REM DISARLE LOWER CASE 
70 GO TO 32767 

100 A§SYSC7Z%90Z) \ REM ENABLE LOWER CASE 
32767 ENT 

REATLIY 

RUNNE 

nO YOU WANT TO ENTER LOWER CASE 

REALTY 

40 af ab= "a" ther 160 \ rem Check f 

suo SO @200CLF abo ni" then 

SO TF Ags *N* THEN if ages f'n" 

REALLY 

Laigbrm 

10 REM FROGRAM TO CHANGE 

20 FRINT "ro YOU WANT 

30 INFUT A$ 

40 IF Ag="¥" THEN 100 

45 IF Ag= "yu" THEN 100 \ REM Check for lower 
5O TF Ages "N" THEN TF Ags "mi" THEN 

60 A=SYS(7Z912%) \ REM DISABLE LOWER 

70 GO TO 32767 

100 A#SGYS¢07470%) \ REM ENABLE 

32767 END 

REALY 


reeaeary 


lO YOU WANT TO ENTER LOWER CASE CHARACTERS 


REA 


DAVIE 


REA 


ny 
LOWCHM 


hy 


‘s 


lower case 


for lower case m 


CY OR NO? rn 


If you type lower case letters when lower case is disabled, 


echoe 


Note that BASIC converts lower case keywords 


upper 
the t 


qd aS upper case. 


and 


variable 


they 


names 


are 


to 


case characters but leaves string constants, strings entered at 


erminal, 


and remarks unchanged. 
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USING ASSEMBLY LANGUAGE ROUTINES WITH BASIC 


4.1 INTRODUCTION TO ASSEMBLY LANGUAGE ROUTINES 


BASIC-11 allows you to add assembly language routines (ALRs) to expand 
or extend BASIC's capabilities. For example, you can write routines 
for communication with special devices (such as laboratory equipment) 
or to manipulate arrays. Once added to BASIC, such routines can be 
executed in immediate mode or in programs, by means of the CALL 
Statement. (See the BASIC-11 Language Reference Manual.) applications 
programs. There are several advantages to doing this rather’ than 
doing all your programming in assembly language. They are: 


e Only the programmer writing the routine need know assembly 
language. The application programmers need only to know 
BASIC. 


e It is easier to write, debug, and modify BASIC programs’ than 
assembly language programs. You can write, execute, debug, 
and modify your program without leaving BASIC. 


@e You can execute ALRS without writing a program, using 
immediate mode CALL statements. 


NOTE 


This chapter assumes that you are an 
experienced MACRO-1l programmer and that 
you are familiar with your operating 
system and its utility programs 
(editors, MACRO assemblers, task 
builders, linkers, etc.) 


This chapter describes: 
e ALR format. 
e The procedure to access arguments. 


e Use of auxiliary routines provided by BASIC. 


See the BASIC-11/RT-1l Installation Guide for the procedure to add the 
routines to BASIC. 


ALRs that use the FORTRAN IV call interface (as defined in RT-ll 
FORTRAN IV User's Guide) can be called from either FORTRAN IV or RT-1l 
BASIC. However, these ALRS must not access any routines or global 
locations in FORTRAN IV itself. 
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4.2 FORMAT OF THE ASSEMBLY LANGUAGE ROUTINE 


To write an assembly language routine (ALR) that you can add to BASIC, 
you first must specify the name of the routine and its starting 
address in the user routine Name Table (see Figure 4-1). You must 
include a pointer for each ALR after the global location FTBL. Each 
pointer specifies the location of the routine name and starting 
address. A word containing all O's terminates the pointer list. 


NOTE 


ALR names muSt not contain embedded 
blanks. For compatibility with FORTRAN, 
routine names longer than six ASCII 
characters should be avoided (although 
BASIC imposes no length restriction 
other than the limit of the program line 
size). 


Routine Name User Routine Name Table 
Number of characters 


Ist character Point 1 : 

of routine name in. routine name SINCE TO tSE FOUTS EME 
3rd character 2nd character of Poi ; 
of routine name routine name ointer to 2nd routine name 
ae ae ae a Pointer to 3rd routine name 


Last character of 
routine name 


FTBL 


0 if needed 


Pointer to starting address of routine 


Pointer to last routine name 


Figure 4-1 User Routine Name Table and Routine Name Formats 


The BASIC software kit includes a file BSCLI.MAC, with global location 
FTBL. This file is the basis of the pointer table. You build the 
pointer table by adding entries between global location FTBL and _ the 
-WORD O entry, uSing the system editor. 


Normally, placing the ALR's routine name at the beginning of the 
routine is recommended. In this case the pointers in the user routine 
name table should be globals. For example, if you have written three 
routines named INITIT, ADDER, and CHKSTA, the routine name list should 
be: 


+ 


+ 


»GLOBL. FTARL 

»GLOEL INLTNM» ADLINMy CHKSNM 
FTARL3 WORD FT RL. ee 
THI. WORT INTTNM  3$USER ROUTINE 

«WORK ALITINM $NAME LIST 

WORK CHKSNM 

WORT 6 

/ENEI 
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NOTE 


You should edit the items printed in red 
in this listing into the file BSCLI.MAC. 
The items printed in black are already 
in the file. 


The locations, INITNM, ADDNM, and CHKNM should be at the beginning of 
the INITIT, ADDER, and CHCKST, respectively. For example: 


3 THE INIT ROUTINE 
*GLOBL INITNM 
INT TNM$ *RYTE 4 INUMBER OF CHARACTERS IN NAME 
sASCTIT "INITIT" 
e E’VEEN 
«WORD INITS 
INITST ISTART OF ROUTINE 


+ 


An alternative method is to add the routine name and starting address 
after the routine name table. In this case the starting addresses of 
the routines should be globals. Using the same examples as above, the 
routine name table should be: 


»GLOBL E TART 
. GLORL. INITST» ANUST, CHKSST 
ETABLE WORT ETL, 
TRL sWORD INTLTNM 
WORN ATICINM 
WORT CHKSNM 
WORD 0 
INITNM$ BYTE & NUMBER OF CHARACTERS IN NAME 
ASCII "ENITIT" 
+ EVEN 
WORD INITST 
ALLINM eRYTE ty 
ASCII "ATOR" 
» EVEN 
WORK ANLST 
CHKSNM! =. BYTE 6 
ASCII "CHKSTA" 
JEVEN 
WORD CHKSST 
/ENTD 


Each ALR should start with the global address specified. For example: 


$ THE INITIT ROUTINE 
*GLORL. INITST 
INITST:? ISTART OF ROUTINE 


+ 
+ 


+ 


You should use this alternative method when you are adding an ALR 
written for FORTRAN IV to BASIC. 


USING ASSEMBLY LANGUAGE ROUTINES WITH BASIC 


All the examples in'’this chapter use the recommended method (where the 
routine name packet is at the start of the routine). 


Once you have defined the name and starting address of the routine, 
you can write the routine itself. The ALR can use the stack but it 
must ensure that the stack limit is not exceeded. BASIC puts’ the 
Stack limit in R4 before transferring control to the ALR. If you use 
any of the mathematical operations or function routines provided by 
BASIC, ensure that there is enough free space on the stack before 
executing the routine (15 free words for single precision routines and 
30 free words for double precision routines). The ALR must end with 
an RTS PC instruction with the stack unchanged from its. original 
State. The format of the INITIT routine is: 


9 THE INIT ROUTINE 
«GLOBL. INT TNM 
INITNM3 BYTE & 
“ASCII "INITIT' 
e EVEN 
WORD INITST 
INITST? ISTART OF ROUTINE 
¥ + 
, ‘ 
$ e 
y MATIN BODY OF ROUTINE 
9 + 
y . 
5 + 
RTS FC FEND OF ROUTINE 


4.3 ACCESSING THE ARGUMENTS - THE ARGUMENT LISTS 


When BASIC executes the CALL statement, it evaluates the arguments and 
provides the routine with two lists. One contains pointers to the 
evaluated arguments and the other contains descriptors of the argument 
types. An assembly language routine (ALR) should ensure that the list 
contains the expected number and the right type of arguments. 


Argument checking ensures that errors in a BASIC program will not 
cause a fatal error in the ALR or in BASIC itself. If no argument 
checking is done and a CALL statement contains an incorrect data type, 
the ALR produces unpredictable results. For example, if the ALR 
expects an integer array and the CALL statement contains a string 
expression, the ALR could overwrite sections of the stack. If the ALR 
checks arguments for errors, it can protect itself from errors in 
BASIC programs. (There is no protection from errors in the ALR 
itself.) 


A FORTRAN-compatible ALR cannot check arguments unless it first checks 
and determines that the language calling it is BASIC, because FORTRAN 
does not provide an argument descriptor list. 


Before BASIC transfers control to the ALR, it evaluates the arguments 
in the CALL statement. It creates a list of pointers to the arguments 
and a list of argument descriptors. Figure 4-2 shows the argument 
descriptor lists that BASIC creates before it transfers control to the 
ALR. 
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Argument Descriptor List 
Descriptor of 1st argument Pointer to descriptor List 
Se yoo al 
Descriptor of 2nd argument {D Byte | Number of Arguments — Pointer to List _| R5 
Ge E es » - Pointer to 1st argument 
Pointer to 2nd argument 7 
Descriptor of last argument ach ail 
g ae oe ae Pointer 
List 
Pointer to fast argument 


Figure 4-2 Assembly Language Routine Argument Lists 


Se 


As shown in Figure 4-2, R5 points to a word that specifies the number 
of arguments in the CALL statement and identifies the language calling 
the ALR. The argument pointer list starts at the next word and_ the 
pointer to the argument descriptor list is stored in the previous 
word. 


Each byte of the word pointed to by R5 is meaningful. The low-order 
byte contains the number of arguments. The high order byte identifies 
the language. If the calling language is BASIC, the high order byte 
has a value of 202. If the calling language is FORTRAN IV, the 
high-order byte has a value of 0. 


The pointers in the argument pointer list specify the location of the 
evaluated arguments. There are two exceptions, pointers for null 
arguments and pointers for string array arguments. 


If an argument is null then its pointer does not point to that 
argument but instead contains a value of o-l. A CALL statement 
argument list with two adjacent commas or a terminating command 
produces a null argument. For example, CALL "INITIT" (A, B,, D,) 
produces the following arguments: A, B, null, D, and null. 


If the argument is a string array, then the pointer does not point to 
that argument but instead contains a value needed to access the string 
array. (See Section 4.3.2.) If the argument is an _ unsubscripted 
string or an element of a string array, the pointer specifies the 
location of the first character of the string. 


The argument descriptor list specifies the data type of each argument. 
It also indicates whether the argument is an array or not and whether 
the ALR can return a result in the argument. 


BASIC provides additional information for strings and arrays. In 
these cases the word in the argument descriptor list is a pointer to 
the descriptor word, which has the additional information after it. 
Figure 4-3 describes the format of the descriptor word. BASIC 
indicates if a word in the list is a pointer or a descriptor word by 
the value of the 0 bit. If the 0 bit is clear, then the word in the 
descriptor list is a pointer. If the 0 bit is set, then the word in 
the descriptor list is the descriptor word. Note that the descriptor 
word for strings and arrays has a value of 0 in the O bit. 


NOTE 


All numbers in this chapter that specify 
the contents of a word or a Section of a 
word are octal numbers not decimal 
numbers. 
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Array Size of Read Data Type More Than 
Data Type Onty One Word 
Descriptor 
Contents of Contents of Contents of 
Argument Type Bits 15-13 Argument Type Bit 7 Argument Type Bit 0 
 eeteen ree 7 
Single value 0 Variable 0 Numeric Scalar 
Array 1 Expression Numeric Array 
(Read Only) 
Null 0 String Scalar 
Null 
String Array 


Null 


—--— 
Contents of 
Argument Type Bits 12-8 

Integer 2 Integer 
Single Precision 4 Single Precision 
Floating Point Floating Point 
Number Number 
Double Precision 10 Double Precision 
Floating Point Floating Point 
Number Number 
String 2 String 
Null Argument 0 Null Argument 


Figure 4-3 Format of the Argument Descriptor Word 


The ALR can return arguments only to variables and arrays. If the 
argument iS an expression, constant, or element of a virtual array, 
the seventh bit of the argument descriptor word is set and the ALR 
must not return a value to that argument. 


Bits 12 through 8 of the argument descriptor word specify the size of 
the data type. The ALR does not need to check this information 
because each argument type (specified in bits 6 through 1) has a fixed 
size. The contents of bits 12 through 8 for a string argument can be 
ignored. 


BASIC provides additional information for array and string arguments. 
BASIC specifies the total number of bytes in the array, the number of 
subscripts, the high limit of the first subscript, and the high limit 
of the second subscript (if there are two subscripts). BASIC also 
provides a string reference pointer for string arguments. This 
pointer is used by routines provided by BASIC to access the string 
arguments. See Section 4.3.2 for a description of these routines. 
Figure 4-4 describes the format of array and string descriptors. 
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Descriptor Word 
Array Size (bytes) 


Argument Descriptor List 


Descriptor word for numeric scalar 


Array 
Descriptor i: ene Descriptor word for numeric scalar 
Pointer to array descriptor 
Descriptor word for numeric scalar 
are two Pointer to string scalar descriptor 
Descriptor 


String reference pointer 


Figure 4-4 Format of Array and String Argument Descriptors 


4.3.1 Numeric Arrays 


If the CALL statement specifies an element of a numeric array, for 
example A (10), BASIC considers it a l-dimensional array starting with 
the specified element and ending with the last element of the array. 
BASIC considers it a one-dimensional array even if the entire array is 
two-dimensional. 


BASIC and FORTRAN IV store arrays differently. BASIC array subscripts 
Start at 0, but FORTRAN array subscripts start at 1. In BASIC arrays, 
the second subscript varies faster, but in FORTRAN IV arrays the first 
subscript varies faster. If you are designing a routine to be called 
from either BASIC or FORTRAN IV, you must consider these differences 
in the ALR. 


4.3.2 Strings and String Arrays 


This section describes the routines BASIC provides to allow the 
assembly language routine (ALR) to access strings. It also describes 
some example routines which use these string access routines. BASIC 
allows dynamic-length strings, whose length can change during program 
execution. The BASIC string access routines keep track of the 
location and size of strings. Consequently, an ALR cannot change a 
BASIC string without using the string access routines. 


The procedures for accessing strings and for accessing elements of 
String arrays are different. Note that if the CALL statement 
specifies an element of a string array (for example, A$(10)), BASIC 
considers it a string scalar. Only if the entire array is passed (for 
example, AS$()), does BASIC consider it a string array. 
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The ALR must locate and retrieve the string reference pointer word and 
pass it to the string access routines. For a string argument, the 
string reference pointer is the word following the descriptor word. 
For a string array argument, The ALR must’ calculate the string 
reference pointer to access any element of the array. The string 
reference pointer is a word whose value is determined by the following 
formula: 


string reference pointer=2*offsettargument pointer 


where: offset is the position of the element in the 
array. 
argument pointer is the value for the string array in the 


list of argument pointers. (Note the 
argument pointer for a string array does 
not point to the argument itself.) 


The offset for an element of a one-dimensional array is equal to the 
value of its subscript. The offset for an element of a 
two-dimensional array is defined by this formula: 


offset=subscriptl* (maximum value of subscript2+1l)+subscript2 
For example, consider two arrays A$(10) and BS(3,5) with argument 


pointers of A and B-~ respectively. (NOTE: All numbers’ in the 
following list are decimal.) 


Element 2*offsettargument pointer string reference pointer 
AS (0) 2*0+A A 
AS (4) 2* 44+A 8+A 
BS (0,5) 2* (0*6+5) +B 10+B 
BS (1,5) 2* (1*6+5)+B 22+B 
BS (2,0) 2* (2*6+0)+B 24+B 


The string access routines use the string reference pointer that the 
ALR provides to find and manipulate the string. 


BASIC provides four string access routines: 


SFIND 
SALC 
SSTORE 
SDEALC 


The SFIND routine returns the length of a string and a pointer to the 
first character. The SALC routine allocates a temporary string. An 
ALR can only write characters directly to strings created by SALC. 
The $STORE routine assigns the value of one string to a second string 
and changes the first string to a null string. The S$DEALC routine 
deallocates space used by the temporary string on the stack. 


The ALR should use the following general procedure to manipulate a 
string argument and then return the resultant string. First, the ALR 
accesses the string argument by using the SFIND routine. Then it 
creates a temporary string with the SALC routine. It then reads the 
characters of the string argument, manipulates them in the desired 
way, and writes the characters out to the temporary string. After 
this the ALR uses the S$STORE routine to copy the temporary string to a 
string argument (which can be the original string). Finally, it uses 
the $DEALC routine to remove data placed on the stack by the SALC 
routine. 
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Table 4-1, "Using String Access Routines", describes the four’ string 
access routines. It describes the initial setup, including the format 
of the subroutine jump (JSR) instruction required to invoke the string 
access routine. It also describes the expected results and how to 
interpret them. (In particular, it indicates how to determine whether 
or not you made a correct initial setup in preparation for the string 
access routine.) 


If the ALR calls SFIND, SALC, SSTORE, and SDEALC, it must specify them 
as global locations. 


Before calling any of these routines, you must ensure that R5 contains 
its initial value, the value it had when BASIC transferred control to 
the ALR. That is, R5 must point to the word identifying BASIC and 
specifying the number of arguments. 


NOTE 


These routines require that a register 
contain the same value in bits 6-1 as an 
argument descriptor word for a_e string 
argument. You can ensure this by moving 
a value of 100 into the specified 
register (puts a value of 40 in bits 
6-1) or by moving an argument descriptor 
word in the specifed register. 


4.4 USING ROUTINES PROVIDED BY BASIC 


BASIC provides routines that handle error conditions, print messages 
on the terminal and perform mathematical operations and functions. 


4.4.1 Error Handling and Message Routines 


BASIC provides two error handling routines (S$ARGER and SBOMB) and two 
message printing routines (S$MSG and SCHROT). The SARGER routine 
produces the fatal ?ARGUMENT ERROR (?ARG) message. The ALR should 
call SARGER when it detects an incorrect argument. The $BOMB routine 
allows the ALR to specify its own fatal message. The S$MSG_ routine 
prints any message on the terminal and then returns control to the 
ALR. The SCHROT routine prints any single character on the terminal 
and then returns control to the ALR. 


If the ALR calls SARGER, S$BOMB, SMSG, or $CHROT, it must Specify them 
as global locations. 


Call the SARGER routine by executing the instruction: 
AMF $ARGER 


The SARGER routine prints the error message on the terminal in one of 
the following formats: 


PARGUMENT ERROR AT LINE xxxxx 
PARG AT LINE XXXxxX 


where: 


XXXXX is the line number of the CALL statement. 


Table 4-1 


Using String Access Routine 


Routine Program Setup Result With No Errors Detected Result With Errors Detected 


OT-7 


SFIND 

(return location 
and length of 
string) 


SALC 
(allocate temporary 
string) * 


S$STORE 

(store value of a 
string in a second 
string, make first 
string null) 


SDEALC 

(remove from stack 
the internal pointers 
produced by SALC 
routine) * 


RO+string reference 
pointer 

R1<100 

R5<+initial value 

Execute: JSR PC, SFIND 


RO+required string length 
R1+100 

R5¢initial value 

Execute: JSR PC, SALC 


RO+string reference pointer 
of string to be copied 
Rl<string reference pointer 

of receiving string 
R2<+100 
R5¢initial value 
Execute: JSR PC, S$STORE 


Return stack to the state 
that it was immediately 
following SALC routine. Do 
this by removing any words 
you have added to the stack 
since calling the S$ALC 
routine; this ensures that 


the string reference pointer 


is in the SP. 

R2<+100 

R5<initial value 
Execute: JSR PC, SDEALC 


RO address of first string 
character 

R1 length of string 

R2 = 100 

R3,R4,R5 unchanged 

C-bit 0 (char) 

Z-bit 1 if a null string 
(R1=0) 


RO address of first string 
character 

Rl length of string 

R2 = 100 

R3,R4,R5 unchanged 

C-bit = 0 

Z-bit = 1 if a null string (R1=0) 

SP = string reference pointer 

stack contains several words of 
internal pointers. Remove these 
worus from the stack by the 
SDEALC routine 


RO,R1,R2,R3,R4,R5 unchanged 

C-bit = 0 

string whose pointer was in 
RO is null 

string whose pointer was in 
Rl contains former value of 
the other string 


RO,R1,R2,R3,R4,R5 unchanged 

C-bit = 0 

Stack returned to the state 
that existed before SALC 
was called 


*Any temporary string created by SALC must be removed by $DEALC before the ALR ends. 


RO contains error code: 
if RO=l1, Rl did not equal 100 
if RO=2, RS did not contain correct 
initial value 


R3,R4,R5 unchanged 
C-bit = 1 


RO contains error code: 
if RO=0, indicates insufficient 
free space for requested string 
if RO=l, Rl did not equal 100 
if RO=2, R5 did not contain correct 
initial value 


R3,R4,R5 unchanged 
C-bit = 1 


RO contains error code: 
if RO=1, R2 did not equal 100 
if RO=2, R5 did not contain correct 
initial value 


R1,R2,R3,R4,R5 unchanged 
C-bit = 1 


RO contains error code: 
if RO=1, R2 did not equal 100 
if RO=2, R5 did not contain correct 
initial value 


R1,R2,R3,R4,R5 unchanged 
C-bit = 1 
Stack 


OISVWd HLIM SUNILNOU FOWVNONV'T ATAEWNASSY ONISN 
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If the CALL statement was an immediate mode statement, then AT LINE 
xxxxx is not printed. Control then returns to BASIC, which prints the 
READY message. 


Call the S$BOMB routine by executing the following instruction: 


JSR Kil» ROME 
*ASCTZ ‘message' 
EVEN 


where: 
message is the string of characters that you wish to print. 


The S$BOMB routine prints the error message on the terminal in the 
form: 


Perror message AT LINE xxxxx 
where: 

XXXXX is the line number of the CALL statement. 
If the CALL statement was an immediate mode statement, then AT LINE 
XXXXX is not printed. Control then returns to BASIC, which prints the 
READY message. 


Call the SMSG routine by executing the instruction: 


JSR Roly $46 
*ASCIT "message' 


*RYTE ASy1290 IMUST HAVE CARRIAGE RETURN 
«EVEN SAND LINE FEED ANT END WITH © 
where: 


message is the string of characters that you wish to print. 


The SMSG routine prints the message you specify on the terminal, and 
then returns control to the instruction that follows’ the .EVEN 
instruction. 


Call the S$SCHROT routine as follows: 


1. put the 8-bit ASCII code of the character in the low order 
byte of RU 


2. execute the instruction: 
ASK FCs $CHROT 


SCHROT prints the character specified in RO on the terminal, and then 
returns control to the ALR. 


4.4.2 Mathematical Operation and Function Routines 


Assembly language routines (ALRs) can use _ BASIC's mathematical 
operation and function routine to perform operations and functions 
that you can use in a BASIC program. ALRs can use the same _ routine 
that BASIC itself uses to perform these operations and functions. An 
advantage of this is that the ALR need not duplicate routines’ that 
already exist in BASIC. 
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NOTE 


Assembly language routines that use the 
FP11l Floating Point unit are required to 
save and restore the FPU status. If the 
assembly language routine will modify 
the FPU status, it must preserve the FPU 
status on entry by executing the 
following instruction: 


STFPS -(SP) 


and restore the status (prior to 
returning to the calling program) by 
executing the instruction: 


LDFPS (SP) + 


Tables 4-2 and 4-3 describe the BASIC mathematical operations and 
functions. They show how each operation or function would appear in 
the BASIC language, and name the BASIC-provided routine that will 
perform it. Note that certain operations and functions require one 
routine for single precision arithmetic, a different routine for 
double precision arithmetic, and yet another for integer arithmetic. 


If you are running a BASIC system designed for double precision 
arithmetic, either the single or double precision routine names can be 
used. Either routine name will execute the double-precision routine; 
this fact allows you to use the same code for different systems 
regardless of precision. However, you musSt still be aware of which 
precision you are usSing, and ensure that the data manipulations in the 
program properly reflect the BASIC configuration on which programs are 
running. To be compatible with FORTRAN IV, you must use only the 
double precision routine names to execute the double precision 
routines. 


All routines that have a dollar sign (S$) in their name must be called 
in threaded code mode. To call routines in threaded code mode, first 
call a special subroutine, S$POLSH. After calling SPOLSH, list the 
names of the threaded code routines you wish to call. In threaded 
code mode, each routine iS executed in the order listed. All 
arguments and results are passed on the stack. Finally, list the name 
of a second special subroutine, SUNPOL, which ends threaded code mode. 


You must specify $POLSH, SUNPOL and any routine names you specify as 
globals. 


The call to SPOLSH is in the following format: 
ASE R49 $POLSH 


Figure 4-5 describes the state of the stack before and after each 
threaded code routine. 
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Table 4-2 
BASIC Mathematical Operations 


Single- Double 
Precision | Precision 
Routine Routine 


BASIC 


Operation Operator Meaning Equivalent 


Addition Adds two floating 
point numbers 

Subtraction Subtracts one floating 
point number from 


another 


Multiplication Multiplies two floating] C=A * B 
point numbers 


Multiplies two integers] C%=A%*B% 


Division Divides one floating C=A / B 


point number by 
another 


Divides one integer 
by another integer 


Exponentiation Raises a floating 
point number by a 
floating point ex- 
ponent. 


Raises a floating 
point number by an 
integer exponent. 


Raises an integer by 
an integer exponent. 


Table 4-3 
BASIC Mathematical Functions 


Single- Double 
Precision | Precision 
Routine Routine 


BASIC 


Function Description Equivalent 


Data type Converts floating point number 
conversion to integer 


Converts integer to floating AS 
Truncation Truncates a floating point B=SGN (A) * 
number to a floating point INT (ABS (A) ) 


whole number 


Sine Finds the sine of a radian B=SIN(A) 
value 


Cosine Finds the cosine of a B=COS (A) cos DCOS 
radian value 


Finds the arctangent in B=ATN (A) ATAN DATAN 
radians of a number 


Logarithm Finds the natural log B=LOG (A) ALOG DLOG 
(base e) of a number 


Finds the common log B=LOGLO (A) ALDG1O DLOG1O 
(base 10) of a number 


Square root | Finds the square root of B=SQR(A) SQRT DSQRT 
a number 


Exponential | Finds the value of e B=E XP (A) EXP DEXP 
raised to a number 


Routine 
Names 


$ADR 
$SBR 

$MLR 
$DVR 
$ADD 
$SBD 

$MLD 


$DVD 
XDD$ 


$MLI 
$DVI 
XII$ 


XFIS 


XDIS$ 


$RI 


$DI 


$IR 


$ID 


$INTR 


$DINT 
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Equivalent 
BASIC 
Statement 


C%=A%*B% 
C%=A%/B% 
C%=A%~*B% 


C-A*B% 


C=A~B% 


B%=A 


B%=A 


B=A% 


B=A% 


B=SGN(A)* 


INT(ABS(A)) 


B=SGN(A)* 


INT(ABS(A)) A 


Stack Before 
Execution 


Low-order FP word 

Low-order FP word 

High-order FP word 
Low-order FP word 
Lower-order FP word 
Lowest-order FP word 
High-order FP word 
Low-order FP word 


Lower-order FP word 
Lowest-order FP word 


B% 
A% [Integer word 


Stack 
pointer 


High-order word 
Low-order FP word 


Integer word 


High-order FP word 
Low-order FP word 
Lower-order FP word 
Lowest-order FP word 


A High-order FP word 
Low-order FP word 


High-order FP word 


a% [Integer word 


Stack 
pointer 


Stack 
pointer 


Stack 
pointer 


ax [Integer word | 


A High-order FP word 
Low-order FP word eel 

High-order FP word 

Low-order FP word 


Lower-order FP word 
Lowest-order FP word 


| 


Note: FP stands for Floating Point 


Figure 4-5 


Stack After 
Execution 


C High-order FP word 
Low-order FP word C 


Stack 
pointer 


High-order FP word 


Stack 
pointer 


Stack 
pointer 
Stack 
pointer 


C% [Integer word 


C { -High-order FP word 


Low-order FP word 


High-order FP word 
Low-order FP word 


Lower-order FP word 
Lowest-order FP word 


Stack 
B% | Integer word 
pointer 
Stack 
B% | Integer word 
pointer 
Stack 
pointer 


Stack 
pointer 


B 


{ 
i 
! 


High-order FP word 
Low-order FP word 


High-order FP word 
Low-order FP word 


| High-order FP word 
Low-order FP word 
Lower-order FP word 


Lowest-order FP word 


Stack 
pointer 
Stack 
pointer 


State of Stack for Threaded Code Routines 
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As examples, consider the following segments of routines: 


Segment 1 divides an integer stored in TEMP1 by an integer 


stored 


TEMP2 and stores the quotient in RESULT. 


§ SEGMENT 1 


*GLOBL 
MOV 
MOV 
ASI 
WORT 
»WORT 
MOV 


+ 


«WORT 
+ WORT 
+WORT 


TEMP 1 3 
TEMP 2 
RESULT 


Segment 2 multiplies two 
FLOATA and FLOATB, 


PSEGMENT 2 


+ GLORL 
MOV 
MOV 
MOV 
MOV 
JSR 
»WORT 
+WORL 
MOV 
MOV 


+ 


WORT 
+WORT 
WORT 


FLOATA3 


FLOATE ¢ 
FLOAT: 


$FPOLSH y SUNFPOL » $LVI 
TEMP 9 (SF) 
TEMP2 y= (SE) 

R49 $POLSH 

$OVI 

$UNFOL. 
(SF) +y RESULT 


0) 
0 
Q 


$FOL SH» BUNFOL » BML 
FLOATAE »~ CSF) 
FLOATA y= CSF 
FLOATE +2 9 - CSF 
FLOATE 9 = CSF) 

R49 $FOLSH 

$MLAR 

$UNF OL, 
(SFO ty FLOATC 
(SPO te FLOATCHS 


O¥O 
OQ 
OO 


single-precision 
and stores the product in FLOATC. 


ySET UF THE 

ISTACK 

SENTER THREATEN CONE MOGE 
PSPECTIFY ROUTINE NAME 
gLEAVE THREATEN COE MOQE 
ISTORE RESULT 


floating point 


gPUT FLOATA 

§ON STACK 

gFUT FLOATE 

GON STACK 

gENTER THREATED CODE MOGE 
gSPECTFY ROUTINE NAMIE 
PLEAVE THREATEN COTE MOTE 
ISTORE RESULT 

FIN FLOATC 


Segment 3 converts a double-precision floating point number stored 
FLOAT to an integer and stores it at INTMDW. 


tSEGMENT 3 
+ GLOBL 
MOV 


MOV 
MOY 
MOV 
JSR 
WORTH 
eWORT 
MOV 


+ 


WORT 
e WORT 


FLOAT ¢ 
INTMMW ¢ 


$POLGSH» SUNFOL » SLUT 
FLOATHS y= (SF) 
FLOATH4 y~ (SF) 
FLOATH+Z 9 ~ (SF) 
FLOAT y= (SF) 

4» $FOLSH 

$I 

$UNFOL. 

(SP by LNTMIW 


O»yOx999 
0 


yPUT FLOAT 

FON STACK 

SKEEF DOING IT 

sQONE 

sENTER THREADED CODE MOTE 
ISFECIFY ROUTINE NAME 
gLEAVE THREADED CODE MODE 
ISTORE RESULT 


Although the foregoing examples have only one routine name after 


call to $POLSH, you can specify any number of routine names. 


always follow the last of routine name with the SUNPOL routine. 
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at 


each 
You must 
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The sine, cosine, arctangent, logarithm, square root, and exponential 
routines each use an argument list similar to the BASIC CALL argument 
list. An ALR must establish the argument list before calling the 
routine. The format of the argument list for the single-precision 
routines, SIN, COS, ATAN, ALOG, ALOG10, SQRT, and EXP, is: 


poo dT i Ct 


Pointer to list 


R5 


High-order FP word 
Low-order FP word 
Figure 4-6 Argument List for Supplied Single-Precision Routines 


The format of the argument list for the double-precision routines, 
DSIN, DCOS, DATAN, DLOG, DLOG1LO, DSQRT, and DEXP is: 


pO 


Pointer to argument 


Pointer to list 


R5 


High-order FP word 
Low-order FP word 
Lower-order FP word 
| Lowest-order FP word 


Figure 4-7 Argument List for Supplied Double-Precision Routines 


In both cases, the routines are called by the instruction: 
JSR PC, routine name 


The single-precision routines return the result in RO and Ril; the 
high-order word is in RO and the low order word is in Rl. 


The double-precision routines return the result in RO, Rl, R2, and R3. 
The high-order word is in RO and the low, lower, and lowest order 
words are in Rl, R2, and R3, respectively. 

You must specify as global any routine name that you call. 


These routines do not preserve any registers. 


NOTE 


You should save the initial value of R5- 
before loading the pointer to the 


argument for these routines. You will 
need the saved value to execute any 
threaded code routine to access 
arguments. 


Consider the following segment of a routine that finds the square root 
of a sSingle-precision floating point number, NUM1, and stores the 
result in NUM2: 


SSEGMENT WHICH 


TEMP AL ¢ 
NUMI 
NUM 3 


2 GLO. 


MOY 
MOV 
MOV 
MOV 
ASK 
MOV 
MOV 
MOV 
MOV 
MOY 

+ 
«WORT 
WORT 
e WORT 
e WORT! 
FLT 
FLT 
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FINOS SQUARE ROOT 
SAR T 
Ry TEMES 
Ribs TEMP L 
RO» TEMFO 
FARGe RS 
FC» SQRT 
ROv NUM2 
Ril» NUM2+2 
TEMPS ey RG 
TEMP Ly Rd 
TEMP Os RO 


1 
NUM. 
0 
Q 


0 


ROUTINES WITH BASIC 


VALUE OF RS 
REGISTER 


ISAVE OLD 
SSAVE ANY OTHER 


SET UP RS 

CALL ROUTINE 
STORE HIGH ORTIER 
STORE LOW ORTER 
RESTORE SAVEN 


REGISTERS 


RESULT 
RESULT 


Sh “> “> “> “> “cm 
4 


The following example is a complete assembly language routine. This 


routine can be called by the following statement: 
CALL WYFOT CAs By Cy 0%) 


the value of the expression SQR(A*A+B”2), 
and assigns the truncated value to C%. 


The routine calculates 
assigns ‘the value to C, 


»TITLE 
sFSECT 


HYFOT 
SUBRS »ROy I 


*GLOBL  HYF TAK 
HYP TAB? «BYTE ww 
*“ASCIT “HYFOT’ 
«EVEN 
WORT HYFOT 
*GLOBL 
GOR. 


$ARGERs $ROMB, $F OL SH s SUNF OL 
$MLAy XP Tb y SANK y SART e RI 


HYFOTS CMP 
BEQ 
JME 
CMP 


CRS by RA 
Ot 

BARGE 
CRS ty #202 


PARE 
sYES. 
INO» TSSUE ARGUMENT ERROR, 

PARE WE BEING CALLED BY BASTIO.<11 
PWITH ARGUMENT DESCRIPTORS? 

gNO. 


THERE 4 ARGUMENTS? 
LOB e 
2) BS 

BNE &O$ 
CHECKIN THAT THERIE 
STACK SPACE. 30. BYTES 
SUPP ICTENT . 
3 BO 


IS ENQUGH 
’ SHOULME Te: 
¥§ 
SE y RS SSUBTRACT 

KIO. 9 RS 

Ray RA 1S 
SO 8 PNO« 
Ri» $ROME HYES» TISSUE 
“STACK OVERFLOW TN HYFOT ¢ 


MOM VALUE « 
SUE 
CMF 
BHIS 
JSR 
LASOLZ 
EVEN 
MOY 


FROM THE CURRENT 


SF 


TT BELOW THE LIM nT? 


MESSAGE. 


POUINTER TO THE FURST ELEMENT 

ARGUMENT TESCRIFTOR LISt. 
QESCRIPTOR OF THE IST ARGUMENT. 
& WORT REAL VALUE? 


SO ¢ ~ ACR) 9 4 gGET THE 
gIN THE 

PGET THE 
gS IT A 


wl SSE 
BEC 
CMF 
BNE 


ASSES 


By GETOSC 
HLGO201 9 RS 
PAO vy WS 
Lod 

Bly GETISC 


SNO. 


gYES» GET THE DESCRIPTOR OF THE 2@NY ARGUMENT 


A-17 


SOb? 


PGETOST 


SINFUTS ¢ 


y 
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RIC HIGOROL RS P15 IT ALSO A 2 WORT REAL? 

CMF HLOAO YRS 

BNE 10% INO. 

ASK BC GETOSC (GET THE TESCRIFTOR QF THE SRO ARGUMENT. 


BIC #1 SOOOL IRS 1S IT A 2 WORT REAL WITH WRITING ALLOWE 


CMF HELO 9 FOS 

BNE 10% INO, 

ASTIN Bt» GETISC IGET THE DESCRIFTOR QF THE 4TH ARGUMENT. 
RIC FLGQOOL yhS 

CME FLOS2 y KS gTS IT AN INTEGER WITH WRITING ALLOWET? 
GNE Los gNO. 

MOV CRY) Fe RS IPUSH THE IST ARGUMENT ON THE STACK. 
MQOV CRS) ye COPY SNOTES LOW ORTHER TS FUSHET FIRST. 

MOV CRAP ye CSPD 

MOV 2ORBI ye CSE) SFUSH IT AGAIN BECAUSE WE WILL 00 

MOV CRB) ye CSP) eAXA TO GET ATR. 

ASK Ray $E OL SH 

SMI . e000 THE MULTIFLY. 


MOM CRED by RS SPUSH THE 2NIP ARGUMENT. 

MOV 2 CRB) 9 CSF 

May CRB CSF 

MOV #29 (SF) sFUSH A 2 BECAUSE WE WILL USE REAL 
3TO INTEGER EXPONENTIATION. 

JSR R4»$FOLGH 

XFI$ | SSQUARE THE 2NIt ARGUMENT. 

$ALIR FALL SQUARE OF 2ND ARGUMENT TO SQUARE 
30F FIRST ARGUMENT. 

UNF OL 
;NOW CREATE ON THE STACK THE ARGUMENTS 
SREQUIRED BY SQRT. 

MOV Ry CSF) SSAVE RS. 

MOV SFy RS SCREATE FOINTER TO VALUE ON THE STACK. 

TST CRE) + 

MOV RS 9 CSF) 

MOV Bl y~ (SF) SSHOW ONLY - ARGUMENT TO SQRT 

MOV SP yo RS 

JGR EC »SQRT SGET THE SQUARE ROOT. 

CMF (SPO by CSF) 4 SREMOVE OLD ARGUMENTS FROM THE STACK. 

May (SF) +9 RS SRESTORE RS. 

MOV CRE) by RB SPOINT TO THE 3R0 ARGUMENT. 

MOV RO» CRB) + SSTORE THE REAL RESULT IN THE 

MOV Rly CRB) S3R0 ARGUMENT. 
SNOTE!? SQRT RETURNED ITS RESULT IN RO & 

MOV Rls 2¢SF) SREPLACE THE SUM OF THE SQUARES 

MOV RO» (SFY SWITH ITS SQUARE ROOT. 

JGR R49 $POLSH 

BRI SCONVERT TO AN INTEGER. 

$UNFOL. 

MOV (SF 49 @ CRD + SSTORE THE INTEGER RESULT IN 
STHE 4TH ARGUMENT. 

RTS PC SRETURN TO THE CALLER. 


RETURNS THE NEXT ARGUMENTS TESCRIF TOR WORT. 


R4 FOINTS TO THE WORK TN THE QESCRIPTOR LIST. 


FOQUTRUTS ¢ 


‘wer NEe 


GE TTS 3 


LOG? 


Ra erc}sy 


RS CONTAING THE TESCRIFTOR WORD FOR THE CURRENT ARGUMENT « 
R4 0S URFQATED TO POINT TO THE NEXT ELEMENT IN THE LIST. 


MOV CRA D+ 9 RS IGET THE DESCRIFTOR, 

BIT HL y RS 15 TT A FOINTER? 

BNE Lod INO. 

MOV CRS vy RS gYESy GET THE ACTUAL QESCRIE TOR « 
RTS BO 


+ ENT 


ne? 


Ril 
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ALR, FORTRAN-compatible, 4-4 

SARGER routine, 4-9 

Argument checking, 4-4 

Argument descriptor list, 4-4 

Argument descriptor word, 4-6 

Argument list, 4-4, 4-5 
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File type, default, 2-2 

SFIND routine, 4-8, 4-9, 4-10 
Floating point precision, 1-7 
Foreground job, 1-4 

FRUN command, 1-4 
Function, ABORT, 3 
Function, CTRLC, 3- 
Function, optional, 1 
Function, RCTRLC, 3-3 
Function, RCTRLO, 3-2 
Function, SYS, 3-5 
Function, TTYSET, 3-1 


Global address, 4-3 


Indirect file, 1-5 


LET statement, 3-1 

Link time feature selection, 
1-1 

Lower case characters, 3-7 


Mathematical routines, 4-11, 
4-12, 4-13 

Message routines, 4-9 — 

SMSG routine, 4-9, 4-11 
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Name table, user routine, 4-2 RUN command, 1-3 

Numeric arrays, 4-7 Run time feature selection, 1-1 
Offset, 4-8 Scalar, string, 4-7 

OPEN statement, 2+3 Single character input, 3-6 
Optional features, 1-1 Single job monitor, 1-2 


Software kit, BASIC, 4-2 
Stack limit, 4-4 
Starting address, routine, 4-3 


Pointer, argument, 4-8 Starting BASIC, 1-2 
Pointer list, argument, 4-4 Statement, CALL, 4-1, 4-4 
Pointer, string reference, Statement, LET, 3-1 
4-6, 4-8 Statement, OPEN, 2-3 
SPOLSH routine, 4-12 Stopping BASIC programs, 1-6 
Precision, floating point, 1-7, SSTORE routine, 4-8, 4-9, 4-10 
4-16 String access routines, 4-8, 
Program termination, 3-4 4-9, 4-10 


String argument descriptor, 


String arrays, 4-7 


RCTRLC function, 3-3 String reference pointer, 4-6 
RCTRLO function, 3-2 SYS functions, 3-5 
RET key, vi System functions, 3-5 


Routine, SALC, 4-8, 4-9, 4-10 
Routine, SARGER, 4-9 
Routine, S$BOMB, 4-9, 4-11 


Routine, SCHROT, 4-9, 4-11 Terminal margin setting, 3-1 
Routine, S$DEALC, 4-8, 4-9, 4-10 Terminating BASIC, 3-6 
Routine, $FIND, 4-8, 4-9, 4-10 Terminating the program, 3-4 
Routine, $MSG, 4-9, 4-11 Threaded code routine, 4-12, 
Routine, S$POLSH, 4-12 4-14 

Routine, SSTORE, 4-8, 4-9, 4-10 TTYSET function, 3-1 


Routine, SUNPOL, 4-12 
Routine name, 4-2 
Routines, assembly language, 


4~] SUNPOL routine, 4-12 
Routines, error handling, 4-9 User routine name table, 4-2 
Routines, mathematical, 4-11, Utility functions, 3-1 
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READER'S COMMENTS 


NOTE: This form is for document comments only. DIGITAL will 
use comments submitted on this form at the company's 
discretion. Problems with software should be reported 
on a Software Performance Report (SPR) form. If you 
require a written reply and are eligible to receive 
one under SPR service, submit your comments on an SPR 
form. 


Did you find errors in this manual? If so, specify by page. 


Did you find this manual understandable, usable, and well-organized? 
Please make suggestions for improvement. 


Is there sufficient documentation on associated system programs 
required for use of the software described in this manual? If not, 
what material is missing and where should it be placed? 


Please indicate the type of user/reader that you most nearly represent. 


Assembly language programmer 
Higher-level language programmer 
Occasional programmer (experienced) 
User with little programming experience 
Student programmer 
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Non-programmer interested in computer concepts and capabilities 
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